home *** CD-ROM | disk | FTP | other *** search
/ SOHO - Exploring the Sun - 2003 Update / SOHO - Exploring the Sun - 2003 Update.iso / pc / data / main.dcr / scripts_35.ls < prev    next >
Encoding:
Text File  |  2003-02-25  |  476 b   |  15 lines
  1. on sh name
  2.   global MainMode, qtinstaller, MainPath, JpgPath, MovPath, TxtPath, Writer, km, hyperword
  3.   ClrCursorS()
  4.   WaitCursor()
  5.   set path to "ency"
  6.   set hyperword to name
  7.   if (name = "auroras") or (name = "cme") or (name = "comet") or (name = "corona") or (name = "magneto") or (name = "solarwi") or (name = "sunspot") then
  8.     set jmp_name to "ency_" & name
  9.     jump(label(jmp_name), the frame - 1)
  10.   else
  11.     puppetTransition(9, 2)
  12.     go(the frame + 3)
  13.   end if
  14. end
  15.